Clickx 22/Clickx 22.iso/Menu.dxr/00008_knop_groep.ls

Text File | 2005-01-01 | 568 b | 34 lines

property pGroepID
global gGroep, gGroepNaam

on beginSprite me
  sprite(me.spriteNum).visible = 1
end

on mouseEnter me
  if pGroepID <> 0 then
    sprite(me.spriteNum).member = "menu_knop_R"
  end if
end

on mouseLeave me
  if pGroepID <> 0 then
    sprite(me.spriteNum).member = "menu_knop_N"
  end if
end

on mouseDown me
  if pGroepID <> 0 then
    sprite(me.spriteNum).member = "menu_knop_D"
    gGroep = pGroepID
  end if
end

on mouseUp me
  if pGroepID <> 0 then
    sprite(me.spriteNum).member = "menu_knop_N"
    deleteLogos()
    go("submenu")
  end if
end